#This is a comment line, and should be ignored

# %% is read as a steps per order control line
# && is read as a phasemap control line
# they are only executed if either of them needs refreshing,
# as determined by the console

# Commands and args are:
# spectrum: [lambda, zone settings file, file name format]
# stepsperorder: [lambda, start volt offset, stop volt offset, step_size, number of scans, gain, exposure_ime]
# phasemapper: [source1, source2, lambda1, lambda2, cam_gain, exposure_time, smooth_size]
# shutterclose: [dummy]
# shutdownspex: [dummy]
# cameraset: [exposure time, gain]
# runscript: [name of idl pro file to run, no extension needed]
# mirror: [home_sky | home_cal | drive_sky | drive_cal]
# cal_switch: [calibration source number]

set_status: [`Start Schedule`]
%% stepsperorder: [632.8, 660, 750, 3., 15, 1, 0.15]
&& phasemapper: [0,1, 632.8, 632.8, 1, 0.15, 0.5]

# Phase map taken at start and end of each night:
ifsea: [-3, -2.5] [cont]

	cameraset: [0.15, 10]
	set_status: [`Acquire Phasemap`]
	phasemapper: [0, 1, 632.8, 632.8, 1, 0.15, 0.5]
	set_status: [`Spectra: laser`]
	spectrum: [632.8, default_zones.txt, `Y$_doy$_Date_0n$_0d$_CAL_6328_NZ0115.nc`]	
	
ifsea: [-3, -2.5] [loop]


# Sodium twilight:
ifsea: [-7, -3] [cont]

	set_status: [`Twilight Sodium`]
	cameraset: [0.15, 1]	
	mirror: [drive_cal]
	cal_switch: [1]
	spectrum: [632.8, default_zones.txt, `Y$_doy$_Date_0n$_0d$_CAL_6328_NZ0115.nc`]		

	filter: [5]	
	mirror: [drive_sky]
	cal_switch: [1]
	cameraset: [0.15, 230]
	spectrum: [589.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_5890_NZ0115.nc`]
	spectrum: [589.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_5890_NZ0115.nc`]
	spectrum: [589.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_5890_NZ0115.nc`]
	
ifsea: [-7, -3] [loop]

# Main Red-Green loop:
ifsea: [-100, -7] [cont]

#	set_status: [`Obs: Red`]
#	filter: [1]  
#	ifut: [0, 5] [begin]
#
#           cameraset: [0.05, 10]    
#           mirror: [drive_cal]
#           spectrum: [632.8, default_zones.txt, `Y$_doy$_Date_0n$_0d$_CAL_6328_NZ0115.nc`]         
#
#           mirror: [drive_sky]
#           cameraset: [0.18, 500]   
#           spectrum: [630.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_6300_NZ0115.nc`]
#           spectrum: [630.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_6300_NZ0115.nc`]
#           spectrum: [630.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_6300_NZ0115.nc`]
#
#	ifut: [0, 5] [end]

	set_status: [`Obs: Red & Green`]
	cameraset: [0.15, 200]	

	mirror: [drive_cal]
	cal_switch: [1]
	spectrum: [632.8, default_zones.txt, `Y$_doy$_Date_0n$_0d$_CAL_6328_NZ0115.nc`]		

	mirror: [drive_sky]
	filter: [1]	
	cameraset: [0.2, 255]
	spectrum: [630.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_6300_NZ0115.nc`]

	filter: [2]	
	spectrum: [557.7, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_5577_NZ0115.nc`]
	
	filter: [1]	
	spectrum: [630.0, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_6300_NZ0115.nc`]

	filter: [2]		
	spectrum: [557.7, default_zones.txt, `Y$_doy$_Date_0n$_0d$_SKY_5577_NZ0115.nc`]

ifsea: [-100, -7] [loop]


	cameraset: [0.05, 1]	
	mirror: [drive_cal]


# Full daylight stuff:
ifsea: [-2.5, 120] [cont]
	shutterclose: [1]
	shutdownspex: [1]
	runscript: [poker_ftp_data]
#	mirror: [drive_cal]	
	set_status: [`Idle`]
ifsea: [-2.5, 120] [loop]